home *** CD-ROM | disk | FTP | other *** search
/ Click - International Series 1 / Click Jigsaw Puzzles: Ken Duncan.iso / mac / puzzles / FaceOfAges.dxr / 00252_closePreview button.ls < prev    next >
Encoding:
Text File  |  2002-11-11  |  1.5 KB  |  57 lines
  1. property spriteNum
  2. global canRotate, nextRotate, previewSprite
  3.  
  4. on new me, spriteRef
  5.   if the paramCount > 1 then
  6.     spriteNum = spriteRef.spriteNum
  7.   end if
  8.   return me
  9. end
  10.  
  11. on mouseDown me
  12.   set the member of sprite the spriteNum of me to "closePreview click"
  13.   updateStage()
  14. end
  15.  
  16. on mouseEnter me
  17.   if the stillDown and (the clickOn = me.spriteNum) then
  18.     set the member of sprite the spriteNum of me to "closePreview click"
  19.     updateStage()
  20.   end if
  21. end
  22.  
  23. on mouseUp me
  24.   if (the member of sprite me.spriteNum).name = "closePreview click" then
  25.     set the member of sprite the spriteNum of me to "closePreview"
  26.     updateStage()
  27.     if the clickOn = me.spriteNum then
  28.       if sprite(previewSprite).visible then
  29.         aSprite = 0
  30.         repeat while aSprite <= 5
  31.           sprite(previewSprite - aSprite).visible = 0
  32.           set the locH of sprite (previewSprite - aSprite) to the locH of sprite (previewSprite - aSprite) - 9999
  33.           aSprite = 1 + aSprite
  34.         end repeat
  35.       else
  36.         aSprite = 0
  37.         repeat while aSprite <= 5
  38.           sprite(previewSprite - aSprite).visible = 1
  39.           set the locH of sprite (previewSprite - aSprite) to the locH of sprite (previewSprite - aSprite) + 9999
  40.           aSprite = 1 + aSprite
  41.         end repeat
  42.       end if
  43.       updateStage()
  44.     end if
  45.   end if
  46. end
  47.  
  48. on mouseLeave me
  49.   set the member of sprite the spriteNum of me to "closePreview"
  50.   updateStage()
  51. end
  52.  
  53. on mouseUpOutSide me
  54.   set the member of sprite the spriteNum of me to "closePreview"
  55.   updateStage()
  56. end
  57.